|
600
|
How can I display the currency only for not empty cells
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Currency")}:ComputedField := "len(%0) ? currency(dbl(%0)) : ''"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
var_Items:AddItem("0")
var_Items:[ItemBackColor,var_Items:AddItem(nil)] := RGB(255,128,128)
var_Items:AddItem("10000.99")
|
|
599
|
Is there a function to display the number of days between two date including the number of hours
local var_Items as IItems
local h as USUAL
IColumn{oDCOCX_Exontrol1:Columns:Add("Start")}:Width := 32
oDCOCX_Exontrol1:Columns:Add("End")
IColumn{oDCOCX_Exontrol1:Columns:Add("Duration")}:ComputedField := "((1:=int(0:= (date(%1)-date(%0)))) != 0 ? (=:1 + ' day(s)') : '') + (=:1 ? ' ' : '' ) + ((1:=int(0:=((=:0 - =:1 + 1/24/60/60/2)*24))) != 0 ? =:1 + ' hour(s) ' : '' ) + ((1:=round((=:0 - =:1)*60)) != 0 ? =:1 + ' min(s)' : '')"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem(SToD("20010111"))
var_Items:[CellValue,h,1] := SToD("20010114")
h := var_Items:AddItem(SToD("20020222 12:00:00"))
var_Items:[CellValue,h,1] := SToD("20020314 13:00:00")
h := var_Items:AddItem(SToD("20030313"))
var_Items:[CellValue,h,1] := SToD("20030411 11:00:00")
|
|
598
|
Is there a function to display the number of days between two date including the number of hours
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:Columns:Add("Start")
oDCOCX_Exontrol1:Columns:Add("End")
IColumn{oDCOCX_Exontrol1:Columns:Add("Duration")}:ComputedField := "" + CHR(34) + "D " + CHR(34) + " + int(date(%1)-date(%0)) + " + CHR(34) + " H " + CHR(34) + " + round(24*(date(%1)-date(%0) - floor(date(%1)-date(%0))))"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem(SToD("20010111"))
var_Items:[CellValue,h,1] := SToD("20010114 23:00:00")
h := var_Items:AddItem(SToD("20020222 12:00:00"))
var_Items:[CellValue,h,1] := SToD("20020314 13:00:00")
h := var_Items:AddItem(SToD("20030313"))
var_Items:[CellValue,h,1] := SToD("20030411 11:00:00")
|
|
597
|
How can I display the number of days between two dates
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:Columns:Add("Start")
oDCOCX_Exontrol1:Columns:Add("End")
IColumn{oDCOCX_Exontrol1:Columns:Add("Duration")}:ComputedField := "(date(%1)-date(%0)) + ' days'"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem(SToD("20010111"))
var_Items:[CellValue,h,1] := SToD("20010114")
h := var_Items:AddItem(SToD("20020222"))
var_Items:[CellValue,h,1] := SToD("20020314")
h := var_Items:AddItem(SToD("20030313"))
var_Items:[CellValue,h,1] := SToD("20030411")
|
|
596
|
How can I get second part of the date
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Second")}:ComputedField := "sec(date(%0))"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010111 10:10:00"))
var_Items:AddItem(SToD("20020222 11:01:22"))
var_Items:AddItem(SToD("20030313 12:23:01"))
var_Items:AddItem(SToD("20040414 13:11:59"))
|
|
595
|
How can I get minute part of the date
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Minute")}:ComputedField := "min(date(%0))"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010111 10:10:00"))
var_Items:AddItem(SToD("20020222 11:01:00"))
var_Items:AddItem(SToD("20030313 12:23:00"))
var_Items:AddItem(SToD("20040414 13:11:00"))
|
|
594
|
How can I check the hour part only so I know it was afternoon
local var_Items as IItems
oDCOCX_Exontrol1:ConditionalFormats:Add("hour(%0)>=12",nil):Bold := true
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Hour")}:ComputedField := "hour(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010111 10:00:00"))
var_Items:AddItem(SToD("20020222 11:00:00"))
var_Items:AddItem(SToD("20030313 12:00:00"))
var_Items:AddItem(SToD("20040414 13:00:00"))
|
|
593
|
What about a function to get the day in the week, or days since Sunday
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("WeekDay")}:ComputedField := "weekday(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010111 10:00:00"))
var_Items:AddItem(SToD("20020222 11:00:00"))
var_Items:AddItem(SToD("20030313 12:00:00"))
var_Items:AddItem(SToD("20040414 13:00:00"))
|
|
592
|
Is there any function to get the day of the year or number of days since January 1st
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Day since January 1st")}:ComputedField := "yearday(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010111 10:00:00"))
var_Items:AddItem(SToD("20020222 11:00:00"))
var_Items:AddItem(SToD("20030313 12:00:00"))
var_Items:AddItem(SToD("20040414 13:00:00"))
|
|
591
|
How can I display only the day of the date
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Day")}:ComputedField := "day(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010111 10:00:00"))
var_Items:AddItem(SToD("20020222 11:00:00"))
var_Items:AddItem(SToD("20030313 12:00:00"))
var_Items:AddItem(SToD("20040414 13:00:00"))
|
|
590
|
How can I display only the month of the date
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Month")}:ComputedField := "month(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010101 10:00:00"))
var_Items:AddItem(SToD("20020202 11:00:00"))
var_Items:AddItem(SToD("20030303 12:00:00"))
var_Items:AddItem(SToD("20040404 13:00:00"))
|
|
589
|
How can I get only the year part from a date expression
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Year")}:ComputedField := "year(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010101 10:00:00"))
var_Items:AddItem(SToD("20020202 11:00:00"))
var_Items:AddItem(SToD("20030303 12:00:00"))
var_Items:AddItem(SToD("20040404 13:00:00"))
|
|
588
|
Can I convert the expression to date
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Date")}:ComputedField := "date(dbl(%0))"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("-1.98")
var_Items:AddItem("30000.99")
var_Items:AddItem("3561.23")
var_Items:AddItem("1232.34")
|
|
587
|
Can I convert the expression to a number, double or float
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Number + 2")}:ComputedField := "dbl(%0)+2"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("-1.98")
var_Items:AddItem("0.99")
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
|
|
586
|
How can I display dates in long format
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("LongFormat")}:ComputedField := "longdate(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010101 10:00:00"))
var_Items:AddItem(SToD("20020202 11:00:00"))
var_Items:AddItem(SToD("20030303 12:00:00"))
var_Items:AddItem(SToD("20040404 13:00:00"))
|
|
585
|
How can I display dates in short format
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("ShortFormat")}:ComputedField := "shortdate(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010101 10:00:00"))
var_Items:AddItem(SToD("20020202 11:00:00"))
var_Items:AddItem(SToD("20030303 12:00:00"))
var_Items:AddItem(SToD("20040404 13:00:00"))
|
|
584
|
How can I display the time only of a date expression
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Date")
IColumn{oDCOCX_Exontrol1:Columns:Add("Time")}:ComputedField := "'time is:' + time(date(%0))"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010101 10:00:00"))
var_Items:AddItem(SToD("20020202 11:00:00"))
var_Items:AddItem(SToD("20030303 12:00:00"))
var_Items:AddItem(SToD("20040404 13:00:00"))
|
|
583
|
Is there any function to display currencies, or money formatted as in the control panel
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Currency")}:ComputedField := "currency(dbl(%0))"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
var_Items:AddItem("10000.99")
|
|
582
|
How can I convert the expression to a string so I can look into the date string expression for month's name
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Str")}:ComputedField := "str(%0) + ' AA'"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("-1.98")
var_Items:AddItem("0.99")
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
|
|
581
|
Can I display the absolute value or positive part of the number
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Abs")}:ComputedField := "abs(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("-1.98")
var_Items:AddItem("0.99")
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
|
|
580
|
Is there any function to get largest number with no fraction part that is not greater than the value
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Floor")}:ComputedField := "floor(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("-1.98")
var_Items:AddItem("0.99")
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
|
|
579
|
Is there any function to round the values base on the .5 value
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Round")}:ComputedField := "round(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("-1.98")
var_Items:AddItem("0.99")
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
|
|
578
|
How can I get or display the integer part of the cell
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Number")
IColumn{oDCOCX_Exontrol1:Columns:Add("Int")}:ComputedField := "int(%0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("-1.98")
var_Items:AddItem("0.99")
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
|
|
577
|
How can I display names as proper ( first leter of the word must be in uppercase, and the rest in lowercase )
local var_Items as IItems
local h as USUAL
IColumn{oDCOCX_Exontrol1:Columns:Add("")}:FormatColumn := "proper(%0)"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("root")
var_Items:InsertItem(h,nil,"child child")
var_Items:InsertItem(h,nil,"child child")
var_Items:InsertItem(h,nil,"child child")
var_Items:[ExpandItem,h] := true
|
|
576
|
Is there any option to display cells in uppercase
local var_Items as IItems
local h as USUAL
IColumn{oDCOCX_Exontrol1:Columns:Add("")}:FormatColumn := "upper(%0)"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
var_Items:InsertItem(h,nil,"Child 1")
var_Items:InsertItem(h,nil,"Child 2")
var_Items:InsertItem(h,nil,"Chld 3")
var_Items:[ExpandItem,h] := true
|
|
575
|
Is there any option to display cells in lowercase
local var_Items as IItems
local h as USUAL
IColumn{oDCOCX_Exontrol1:Columns:Add("")}:FormatColumn := "lower(%0)"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
var_Items:InsertItem(h,nil,"Child 1")
var_Items:InsertItem(h,nil,"Child 2")
var_Items:InsertItem(h,nil,"Chld 3")
var_Items:[ExpandItem,h] := true
|
|
574
|
How can I display the column using currency format and enlarge the font for certain values
local var_Column as IColumn
local var_Items as IItems
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Currency")}
var_Column:[Def,exCellValueFormat] := 1
var_Column:FormatColumn := "len(value) ? ((0:=dbl(value)) < 10 ? '<fgcolor=808080><font ;7>' : '<b>') + currency(=:0)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("1.23")
var_Items:AddItem("2.34")
var_Items:AddItem("9.94")
var_Items:AddItem("11.94")
var_Items:AddItem("1000")
|
|
573
|
How can I highlight only parts of the cells
local var_Column as IColumn
local var_Items as IItems
local h as USUAL
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("")}
var_Column:[Def,exCellValueFormat] := 1
var_Column:FormatColumn := "value replace 'hil' with '<fgcolor=FF0000><b>hil</b></fgcolor>'"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
var_Items:InsertItem(h,nil,"Child 1")
var_Items:InsertItem(h,nil,"Child 2")
var_Items:InsertItem(h,nil,"Child 3")
var_Items:[ExpandItem,h] := true
|
|
572
|
How can I get the number of occurrences of a specified string in the cell
local var_Column as IColumn
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:Columns:Add("")
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("occurrences")}
var_Column:ComputedField := "lower(%0) count 'o'"
var_Column:FormatColumn := "'contains ' + value + ' of \'o\' chars'"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
var_Items:InsertItem(h,nil,"Child 1 oooof the root")
var_Items:InsertItem(h,nil,"Child 2")
var_Items:InsertItem(h,nil,"Child 3")
var_Items:[ExpandItem,h] := true
|
|
571
|
How can I display dates in my format
local var_Column as IColumn
local var_Items as IItems
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Date")}
var_Column:[Def,exCellValueFormat] := 1
var_Column:FormatColumn := "'<b>' + year(0:=date(value)) + '</b><fgcolor=808080><font ;6> (' + month(=:0) + ' - ' + day(=:0) +')'"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010121"))
var_Items:AddItem(SToD("20020222"))
var_Items:AddItem(SToD("20030313"))
var_Items:AddItem(SToD("20040424"))
|
|
570
|
How can I display dates in short format
local var_Items as IItems
IColumn{oDCOCX_Exontrol1:Columns:Add("Date")}:FormatColumn := "shortdate(value)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010101"))
var_Items:AddItem(SToD("20020202"))
var_Items:AddItem(SToD("20030303"))
var_Items:AddItem(SToD("20040404"))
|
|
569
|
How can I display dates in long format
local var_Items as IItems
IColumn{oDCOCX_Exontrol1:Columns:Add("Date")}:FormatColumn := "longdate(value)"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(SToD("20010101"))
var_Items:AddItem(SToD("20020202"))
var_Items:AddItem(SToD("20030303"))
var_Items:AddItem(SToD("20040404"))
|
|
568
|
How can I display only the right part of the cell
local var_Column as IColumn
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:Columns:Add("")
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Right")}
var_Column:ComputedField := "%0 right 2"
var_Column:FormatColumn := "'" + CHR(34) + "' + value + '" + CHR(34) + "'"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
var_Items:InsertItem(h,nil,"Child 1")
var_Items:InsertItem(h,nil,"Child 2")
var_Items:InsertItem(h,nil,"SChild 3")
var_Items:[ExpandItem,h] := true
|
|
567
|
How can I display only the left part of the cell
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:Columns:Add("")
IColumn{oDCOCX_Exontrol1:Columns:Add("Left")}:ComputedField := "%0 left 2"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
var_Items:InsertItem(h,nil,"Child 1")
var_Items:InsertItem(h,nil,"Child 2")
var_Items:InsertItem(h,nil,"SChild 3")
var_Items:[ExpandItem,h] := true
|
|
566
|
How can I display true or false instead 0 and -1
local var_Items as IItems
IColumn{oDCOCX_Exontrol1:Columns:Add("Boolean")}:FormatColumn := "value != 0 ? 'true' : 'false'"
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(true)
var_Items:AddItem(false)
var_Items:AddItem(true)
var_Items:AddItem(0)
var_Items:AddItem(1)
|
|
565
|
How can I save data on XML format
oDCOCX_Exontrol1:LoadXML("http://www.exontrol.net/testing.xml")
oDCOCX_Exontrol1:SaveXML("c:/temp/exgrid.xml")
|
|
564
|
How can I load data on XML format
oDCOCX_Exontrol1:LoadXML("http://www.exontrol.net/testing.xml")
|
|
563
|
I have an EBN file how can I apply different colors to it, so no need to create a new one
local var_Items as IItems
local h,hC as USUAL
oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
oDCOCX_Exontrol1:SelBackColor := oDCOCX_Exontrol1:BackColor
oDCOCX_Exontrol1:SelForeColor := oDCOCX_Exontrol1:ForeColor
oDCOCX_Exontrol1:HasLines := exNoLine
oDCOCX_Exontrol1:Columns:Add("Default")
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
hC := var_Items:InsertItem(h,nil,"Default")
var_Items:[ItemBackColor,hC] := 0x1000000
var_Items:[ItemHeight,var_Items:InsertItem(h,nil,"")] := 6
hC := var_Items:InsertItem(h,nil,"Light Green")
var_Items:[ItemBackColor,hC] := 0x100ff00
var_Items:[ItemHeight,var_Items:InsertItem(h,nil,"")] := 6
hC := var_Items:InsertItem(h,nil,"Dark Green")
var_Items:[ItemBackColor,hC] := 0x1007f00
var_Items:[ItemHeight,var_Items:InsertItem(h,nil,"")] := 6
hC := var_Items:InsertItem(h,nil,"Magenta")
var_Items:[ItemBackColor,hC] := 0x1ff7fff
var_Items:[ItemHeight,var_Items:InsertItem(h,nil,"")] := 6
hC := var_Items:InsertItem(h,nil,"Yellow")
var_Items:[ItemBackColor,hC] := 0x17fffff
var_Items:[ItemHeight,var_Items:InsertItem(h,nil,"")] := 6
var_Items:[ExpandItem,h] := true
|
|
562
|
How can I change the background color or the visual appearance using ebn for a particular column
local var_Columns as IColumns
oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
var_Columns := oDCOCX_Exontrol1:Columns
var_Columns:Add("Column 1")
IColumn{var_Columns:Add("Column 2")}:[Def,exHeaderBackColor] := 16777216
IColumn{var_Columns:Add("Column 3")}:[Def,exHeaderBackColor] := 16777471
var_Columns:Add("Column 4")
|
|
561
|
How can I change the foreground color for a particular column
local var_Columns as IColumns
var_Columns := oDCOCX_Exontrol1:Columns
var_Columns:Add("Column 1")
IColumn{var_Columns:Add("Column 2")}:[Def,exHeaderForeColor] := 8439039
var_Columns:Add("Column 3")
|
|
560
|
How can I change the background color for a particular column
local var_Columns as IColumns
var_Columns := oDCOCX_Exontrol1:Columns
var_Columns:Add("Column 1")
IColumn{var_Columns:Add("Column 2")}:[Def,exHeaderBackColor] := 8439039
var_Columns:Add("Column 3")
|
|
559
|
Does your control support RightToLeft property for RTL languages or right to left
local var_Column as IColumn
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ScrollBars := exDisableBoth
oDCOCX_Exontrol1:LinesAtRoot := exLinesAtRoot
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("P1")}
var_Column:[Def,exCellHasCheckBox] := true
var_Column:PartialCheck := true
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Root")
var_Items:InsertItem(h,nil,"Child 1")
var_Items:InsertItem(h,nil,"Child 2")
var_Items:[ExpandItem,h] := true
oDCOCX_Exontrol1:RightToLeft := true
oDCOCX_Exontrol1:EndUpdate()
|
|
558
|
Is there any way to display the vertical scroll bar on the left side, as I want to align my data to the right
local var_Columns as IColumns
oDCOCX_Exontrol1:BeginUpdate()
oDCOCX_Exontrol1:ScrollBars := exDisableBoth
var_Columns := oDCOCX_Exontrol1:Columns
var_Columns:Add("C1")
var_Columns:Add("C2")
var_Columns:Add("C3")
var_Columns:Add("C4")
var_Columns:Add("C5")
var_Columns:Add("C6")
var_Columns:Add("C7")
var_Columns:Add("C8")
oDCOCX_Exontrol1:RightToLeft := true
oDCOCX_Exontrol1:EndUpdate()
|
|
557
|
Can I display the cell's check box after the text
local var_Column as IColumn
local var_Items as IItems
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Column")}
var_Column:[Def,exCellHasCheckBox] := true
var_Column:[Def,exCellDrawPartsOrder] := "caption,check"
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellHasCheckBox,var_Items:AddItem("Caption 1"),0] := true
var_Items:[CellHasCheckBox,var_Items:AddItem("Caption 2"),0] := true
|
|
556
|
Can I change the order of the parts in the cell, as checkbox after the text, and so on
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
IColumn{oDCOCX_Exontrol1:Columns:Add("Column")}:[Def,exCellDrawPartsOrder] := "caption,check,icon,icons,picture"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Text")
var_Items:[CellImage,h,0] := 1
var_Items:[CellHasCheckBox,h,0] := true
|
|
555
|
Can I have an image displayed after the text. Can I get that effect without using HTML content
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
IColumn{oDCOCX_Exontrol1:Columns:Add("Column")}:[Def,exCellDrawPartsOrder] := "caption,icon,check,icons,picture"
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Text")
var_Items:[CellImage,h,0] := 1
|
|
554
|
How can I display the column's header using multiple lines
oDCOCX_Exontrol1:HeaderHeight := 128
oDCOCX_Exontrol1:HeaderSingleLine := false
IColumn{oDCOCX_Exontrol1:Columns:Add("This is just a column that should break the header.")}:Width := 32
oDCOCX_Exontrol1:Columns:Add("This is just another column that should break the header.")
|
|
553
|
How can include the values in the inner cells in the drop down filter window
local var_Column as IColumn
local var_Items as IItems
local s as USUAL
oDCOCX_Exontrol1:DrawGridLines := exRowLines
oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
oDCOCX_Exontrol1:[Description,exFilterBarBlanks] := ""
oDCOCX_Exontrol1:[Description,exFilterBarNonBlanks] := ""
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Single Column")}
var_Column:HTMLCaption := "Single column with <b>inner cells</b>"
var_Column:ToolTip := "Click the drop down filter button, and the filter list includes the inner cells values too."
var_Column:DisplayFilterButton := true
var_Column:DisplayFilterPattern := false
var_Column:FilterList := exIncludeInnerCells
oDCOCX_Exontrol1:ShowFocusRect := false
var_Items := oDCOCX_Exontrol1:Items
s := var_Items:[SplitCell,var_Items:AddItem("S 1.1"),0]
var_Items:[CellValue,nil,s] := "S 1.2"
var_Items:[CellHAlignment,nil,s] := CenterAlignment
var_Items:[CellBackColor,nil,s] := 0x1000000
var_Items:[CellWidth,nil,s] := 84
s := var_Items:[SplitCell,var_Items:AddItem("S 2.1"),0]
var_Items:[CellValue,nil,s] := "S 2.2"
var_Items:[CellHAlignment,nil,s] := CenterAlignment
var_Items:[CellWidth,nil,s] := 84
s := var_Items:[SplitCell,var_Items:AddItem("S 3.1"),0]
var_Items:[CellValue,nil,s] := "S 3.2"
var_Items:[CellHAlignment,nil,s] := CenterAlignment
var_Items:[CellBackColor,nil,s] := 0x1000000
var_Items:[CellWidth,nil,s] := 84
|
|
552
|
How can I sort the value gets listed in the drop down filter window
local var_Column,var_Column1 as IColumn
local var_Items as IItems
local h as USUAL
oDCOCX_Exontrol1:LinesAtRoot := exLinesAtRoot
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:[Description,exFilterBarAll] := ""
oDCOCX_Exontrol1:[Description,exFilterBarBlanks] := ""
oDCOCX_Exontrol1:[Description,exFilterBarNonBlanks] := ""
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("P1")}
var_Column:DisplayFilterButton := true
var_Column:DisplayFilterPattern := false
var_Column:FilterList := exSortItemsDesc
var_Column1 := IColumn{oDCOCX_Exontrol1:Columns:Add("P2")}
var_Column1:DisplayFilterButton := true
var_Column1:DisplayFilterPattern := false
var_Column1:FilterList := exSortItemsAsc
var_Items := oDCOCX_Exontrol1:Items
h := var_Items:AddItem("Z3")
var_Items:[CellValue,h,1] := "C"
var_Items:[CellValue,var_Items:InsertItem(h,nil,"Z1"),1] := "B"
var_Items:[CellValue,var_Items:InsertItem(h,nil,"Z2"),1] := "A"
var_Items:[ExpandItem,h] := true
|
|
551
|
How can I align the text/caption on the scroll bar
oDCOCX_Exontrol1:[ScrollPartCaption,exHScroll,exLowerBackPart] := "left"
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHScroll,exLowerBackPart] := LeftAlignment
oDCOCX_Exontrol1:[ScrollPartCaption,exHScroll,exUpperBackPart] := "right"
oDCOCX_Exontrol1:[ScrollPartCaptionAlignment,exHScroll,exUpperBackPart] := RightAlignment
oDCOCX_Exontrol1:ColumnAutoResize := false
oDCOCX_Exontrol1:Columns:Add(AsString(1))
oDCOCX_Exontrol1:Columns:Add(AsString(2))
oDCOCX_Exontrol1:Columns:Add(AsString(3))
oDCOCX_Exontrol1:Columns:Add(AsString(4))
oDCOCX_Exontrol1:Columns:Add(AsString(5))
oDCOCX_Exontrol1:Columns:Add(AsString(6))
|
|
550
|
How do I select the next row/item
local var_Items as IItems
oDCOCX_Exontrol1:Columns:Add("Column")
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem("Item 1")
var_Items:AddItem("Item 2")
var_Items:AddItem("Item 3")
var_Items:[SelectItem,var_Items:[NextVisibleItem,var_Items:FocusItem]] := true
|
|
549
|
How do I enable resizing ( changing the height ) the items at runtime
local var_Items as IItems
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:DrawGridLines := exHLines
oDCOCX_Exontrol1:ScrollBySingleLine := true
oDCOCX_Exontrol1:Columns:Add("Column")
oDCOCX_Exontrol1:Items:AddItem("Item 1")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[ItemHeight,var_Items:AddItem("Item 2")] := 48
oDCOCX_Exontrol1:Items:AddItem("Item 3")
oDCOCX_Exontrol1:Items:AddItem("Item 4")
|
|
548
|
How do I enable resizing all the items at runtime
local var_Items as IItems
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeAllItems
oDCOCX_Exontrol1:DrawGridLines := exHLines
oDCOCX_Exontrol1:Columns:Add("Column")
oDCOCX_Exontrol1:Items:AddItem("Item 1")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[ItemHeight,var_Items:AddItem("Item 2")] := 48
oDCOCX_Exontrol1:Items:AddItem("Item 3")
|
|
547
|
How can I remove the filter
local var_Column as IColumn
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Column")}
var_Column:DisplayFilterButton := true
var_Column:FilterType := exBlanks
oDCOCX_Exontrol1:ApplyFilter()
oDCOCX_Exontrol1:ClearFilter()
|
|
546
|
How can I vertically display the column's caption, in the header
IColumn{oDCOCX_Exontrol1:Columns:Add("A")}:HeaderVertical := true
IColumn{oDCOCX_Exontrol1:Columns:Add("B")}:HeaderVertical := true
IColumn{oDCOCX_Exontrol1:Columns:Add("H")}:HeaderVertical := false
|
|
545
|
When I have a column in a grid that is set to having a checkbox, and the grid's singlesel is set to false, I am able to toggle the checkboxes for a while, but lose this functionality eventually. Do you have a tip
local var_Items as IItems
IColumn{oDCOCX_Exontrol1:Columns:Add("Check")}:[Def,exCellHasCheckBox] := true
oDCOCX_Exontrol1:SingleSel := false
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(true)
var_Items:AddItem(false)
var_Items:AddItem(false)
|
|
544
|
How do I arrange, format or layout the item on multiple levels or lines, as a subform
local var_Column,var_Column1,var_Column2,var_Column3,var_Column4,var_Column5,var_Column6 as IColumn
local var_Columns as IColumns
local var_Editor as IEditor
local var_Items as IItems
local h0 as USUAL
oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oDCOCX_Exontrol1:DrawGridLines := exRowLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:ScrollBySingleLine := true
oDCOCX_Exontrol1:BackColor := RGB(255,255,255)
oDCOCX_Exontrol1:SelBackColor := RGB(255,255,255)
oDCOCX_Exontrol1:SelForeColor := 0x80000012
var_Columns := oDCOCX_Exontrol1:Columns
var_Columns:Add("")
var_Column := IColumn{var_Columns:Add("Column")}
var_Column:Visible := false
var_Column:Editor:EditType := EditType
var_Column1 := IColumn{var_Columns:Add("Column")}
var_Column1:Visible := false
var_Column1:Editor:EditType := DropDownType
var_Column2 := IColumn{var_Columns:Add("Column")}
var_Column2:Visible := false
var_Column2:Editor:EditType := DropDownType
var_Column3 := IColumn{var_Columns:Add("Column")}
var_Column3:Visible := false
var_Editor := var_Column3:Editor
var_Editor:EditType := CheckValueType
var_Editor:[Option,exCheckValue2] := 1
var_Column4 := IColumn{var_Columns:Add("Column")}
var_Column4:Visible := false
var_Column4:Editor:EditType := DateType
IColumn{var_Columns:Add("Column")}:Visible := false
var_Column5 := IColumn{var_Columns:Add("Column")}
var_Column5:Visible := false
var_Column5:Editor:EditType := DropDownType
var_Column6 := IColumn{var_Columns:Add("Column")}
var_Column6:Visible := false
var_Column6:[Def,exCellSingleLine] := 0
var_Editor := var_Column6:Editor
var_Editor:EditType := MemoType
var_Editor:ButtonWidth := 17
var_Editor:[Option,exDownArrow] := 0
var_Editor:[Option,exEndKey] := 0
var_Editor:[Option,exHomeKey] := 0
var_Editor:[Option,exLeftArrow] := 0
var_Editor:[Option,exMemoAutoSize] := 0
var_Editor:[Option,exMemoVScrollBar] := -1
var_Editor:[Option,exPageDownKey] := 0
var_Editor:[Option,exPageUpKey] := 0
var_Editor:[Option,exRightArrow] := 0
var_Editor:[Option,exUpArrow] := 0
var_Column6:Visible := false
IColumn{var_Columns:Add("Column")}:Visible := false
var_Items := oDCOCX_Exontrol1:Items
h0 := var_Items:AddItem("")
var_Items:[CellValue,h0,9] := "Dismiss"
var_Items:[CellFormatLevel,h0,0] := "12;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(248,248,248)]/(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(248,248,248)]:12,(1;" + CHR(34) + " " + CHR(34) + "[b=0]/(" + CHR(34) + " " + CHR(34) + "[b=0]:1,(25;(5;" + CHR(34) + " " + CHR(34) + "[b=0]/((" + CHR(34) + "Subject:" + CHR(34) + "[b=0]:80,(1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]/(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1,(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(255,0,0)]:5,1[b=0])," + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1)/1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]))/1;" + CHR(34) + " " + CHR(34) + "[b=0]))/20;(" + CHR(34) + "Location:" + CHR(34) + "[b=0]:80,(1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]/(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1,2[b=0]," + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1)/1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]),((" + CHR(34) + " " + CHR(34) + "[b=0]:10," + CHR(34) + "Label:" + CHR(34) + "[b=0])):50,(1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]/(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1,3[b=0]," + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1)/1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]))/50;(10;" + CHR(34) + " " + CHR(34) + "[b=0]/(1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(255,0,0)]/(" + CHR(34) + "Recurrence:" + CHR(34) + "[b=0]:80," + CHR(34) + "Occurs every day effective 20/04/2007 from 01:00 to 01:01." + CHR(34) + "[b=0])/1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(255,0,0)])/10;" + CHR(34) + " " + CHR(34) + "[b=0])/23;(4[b=0]:20," + CHR(34) + "Reminder:" + CHR(34) + "[b=0]:60,(1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]/(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1,5[b=0]," + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1)/1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]),((" + CHR(34) + " " + CHR(34) + "[b=0]:5,6[b=0])):30,((" + CHR(34) + " " + CHR(34) + "[b=0]:10," + CHR(34) + "Show time as:" + CHR(34) + "[b=0])):90,(1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]/(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1,7[b=0]," + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1)/1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]))/(12;" + CHR(34) + " " + CHR(34) + "[b=0]/(1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]/(" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1,8[b=0]," + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]:1)/1;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(0,0,0)]))/35;(5;" + CHR(34) + " " + CHR(34) + "[b=0]/(" + CHR(34) + " " + CHR(34) + "[b=0]," + CHR(34) + " " + CHR(34) + "[b=0],((" + CHR(34) + " " + CHR(34) + "[b=0]:40,9[b=0])))/5;" + CHR(34) + " " + CHR(34) + "[b=0]))," + CHR(34) + " " + CHR(34) + "[b=0]:1)/1;" + CHR(34) + " " + CHR(34) + "[b=0])," + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(248,248,248)]:12)/12;" + CHR(34) + " " + CHR(34) + "[b=0][bg=RGB(248,248,248)]"
var_Items:[CellHasCheckBox,h0,4] := true
var_Items:[CellHasButton,h0,9] := true
var_Items:[CellHAlignment,h0,9] := CenterAlignment
var_Items:[CellVAlignment,h0,8] := exTop
var_Items:[CellForeColor,h0,8] := RGB(0,0,0)
var_Items:[CellHasButton,h0,6] := true
var_Items:[CellValue,h0,6] := "<img>1</img>"
var_Items:[CellValueFormat,h0,6] := exHTML
var_Items:[CellHAlignment,h0,6] := CenterAlignment
var_Items:[ItemHeight,h0] := 296
|
|
543
|
How do I arrange, format or layout the item on multiple levels or lines
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:DefaultItemHeight := 34
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(1))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(2))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(3))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(4))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(5))}:Visible := false
oDCOCX_Exontrol1:Columns:Add("General")
var_Items := oDCOCX_Exontrol1:Items
var_Items:DefaultItem := var_Items:AddItem(0)
var_Items:[CellValue,0,1] := 1
var_Items:[CellValue,0,2] := 2
var_Items:[CellValue,0,3] := 3
var_Items:[CellValue,0,4] := 4
var_Items:[CellFormatLevel,var_Items:DefaultItem,5] := "0,1,2/3,4"
var_Items:DefaultItem := var_Items:AddItem(5)
var_Items:[CellValue,0,1] := 6
var_Items:[CellValue,0,2] := 7
var_Items:[CellValue,0,3] := 8
var_Items:[CellValue,0,4] := 9
var_Items:[CellFormatLevel,var_Items:DefaultItem,5] := "3,4/0,1,2"
|
|
542
|
How do I arrange, format or layout the column's header on multiple levels or lines
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(1))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(2))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(3))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(4))}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add(AsString(5))}:Visible := false
oDCOCX_Exontrol1:HeaderHeight := 32
IColumn{oDCOCX_Exontrol1:Columns:Add("General")}:FormatLevel := "0,1,2/3,4"
|
|
541
|
How do I arrange, format or layout the item on multiple levels or lines
local var_Column,var_Column1,var_Column2,var_Column3,var_Column4 as IColumn
local var_Editor as IEditor
local var_Items,var_Items1 as IItems
local h0 as USUAL
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:DefaultItemHeight := 53
IColumn{oDCOCX_Exontrol1:Columns:Add("EmployeeID")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("LastName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("FirstName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Handler")}:Visible := false
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Title")}
var_Column:Visible := false
var_Column:DisplayFilterButton := true
var_Column1 := IColumn{oDCOCX_Exontrol1:Columns:Add("TitleOfCourtesy")}
var_Column1:Visible := false
var_Column1:DisplayFilterButton := true
IColumn{oDCOCX_Exontrol1:Columns:Add("BirthDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HideDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Address")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("City")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Region")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("PostCode")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Country")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HomePage")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Extension")}:Visible := false
var_Column2 := IColumn{oDCOCX_Exontrol1:Columns:Add("Photo")}
var_Column2:Visible := false
var_Editor := var_Column2:Editor
var_Editor:DropDownVisible := false
var_Editor:EditType := PictureType
var_Editor:[Option,exShowPictureType] := 0
IColumn{oDCOCX_Exontrol1:Columns:Add("Notes")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("ReportsTo")}:Visible := false
var_Column3 := IColumn{oDCOCX_Exontrol1:Columns:Add("Personal Info")}
var_Column3:[Def,exCellFormatLevel] := "15:54,(2/1/4)"
var_Column3:FormatLevel := "18;18/(15:54,(2/1/4))"
var_Column3:Width := 196
var_Column4 := IColumn{oDCOCX_Exontrol1:Columns:Add("General Info")}
var_Column4:[Def,exCellFormatLevel] := "(8/18;5):128,((((13/11/12),(6/7/10)),16))"
var_Column4:FormatLevel := "18;19/((8/18;5):128,((((13/11/12),(6/7/10)),16)))"
var_Column4:Width := 512
var_Items := oDCOCX_Exontrol1:Items
h0 := var_Items:AddItem(1)
var_Items:[CellValue,h0,1] := "Davolio"
var_Items:[CellValue,h0,2] := "Nancy"
var_Items:[CellValue,h0,3] := 0
var_Items:[CellValue,h0,4] := "Sales Representative"
var_Items:[CellValue,h0,5] := "Ms."
var_Items:[CellValue,h0,6] := "12/8/1948"
var_Items:[CellValue,h0,7] := "5/1/1992"
var_Items:[CellValue,h0,8] := "507-20th Ave. \r\nE.Apt. 2A"
var_Items:[CellValue,h0,9] := "Seattle"
var_Items:[CellValue,h0,10] := "WA"
var_Items:[CellValue,h0,11] := "98122"
var_Items:[CellValue,h0,12] := "USA"
var_Items:[CellValue,h0,13] := "(206) 555-9857"
var_Items:[CellValue,h0,14] := "5467"
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
var_Items:[CellValue,h0,15] := oDCOCX_Exontrol1:ExecuteTemplate("loadpicture(`c:\exontrol\images\sample.bmp`)")
var_Items:[CellValue,h0,16] := "Education includes a BA in psychology from Colorado State University in 1970. She also completed " + CHR(34) + "The Art of the Cold Call." + CHR(34) + " Nancy is a member of ToastmastersInternational."
var_Items:[CellValue,h0,17] := 2
oDCOCX_Exontrol1:PutItems(oDCOCX_Exontrol1:GetItems(0),nil)
var_Items1 := oDCOCX_Exontrol1:Items
var_Items1:[CellFormatLevel,var_Items1:FocusItem,"General Info"] := "15,10,4"
var_Items1:[CellFormatLevel,var_Items1:FocusItem,"Personal Info"] := "1/2"
|
|
540
|
How do I arrange, format or layout the data on multiple levels or lines
local var_Column,var_Column1,var_Column2,var_Column3,var_Column4 as IColumn
local var_Editor as IEditor
local var_Items as IItems
local h0 as USUAL
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:DefaultItemHeight := 53
IColumn{oDCOCX_Exontrol1:Columns:Add("EmployeeID")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("LastName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("FirstName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Handler")}:Visible := false
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Title")}
var_Column:Visible := false
var_Column:DisplayFilterButton := true
var_Column1 := IColumn{oDCOCX_Exontrol1:Columns:Add("TitleOfCourtesy")}
var_Column1:Visible := false
var_Column1:DisplayFilterButton := true
IColumn{oDCOCX_Exontrol1:Columns:Add("BirthDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HideDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Address")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("City")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Region")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("PostCode")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Country")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HomePage")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Extension")}:Visible := false
var_Column2 := IColumn{oDCOCX_Exontrol1:Columns:Add("Photo")}
var_Column2:Visible := false
var_Editor := var_Column2:Editor
var_Editor:DropDownVisible := false
var_Editor:EditType := PictureType
var_Editor:[Option,exShowPictureType] := 0
IColumn{oDCOCX_Exontrol1:Columns:Add("Notes")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("ReportsTo")}:Visible := false
var_Column3 := IColumn{oDCOCX_Exontrol1:Columns:Add("Personal Info")}
var_Column3:[Def,exCellFormatLevel] := "15:54,(2/1/4)"
var_Column3:FormatLevel := "18;18/(15:54,(2/1/4))"
var_Column3:Width := 196
var_Column4 := IColumn{oDCOCX_Exontrol1:Columns:Add("General Info")}
var_Column4:[Def,exCellFormatLevel] := "(8/18;5):128,((((13/11/12),(6/7/10)),16))"
var_Column4:FormatLevel := "18;19/((8/18;5):128,((((13/11/12),(6/7/10)),16)))"
var_Column4:Width := 512
var_Items := oDCOCX_Exontrol1:Items
h0 := var_Items:AddItem(1)
var_Items:[CellValue,h0,1] := "Davolio"
var_Items:[CellValue,h0,2] := "Nancy"
var_Items:[CellValue,h0,3] := 0
var_Items:[CellValue,h0,4] := "Sales Representative"
var_Items:[CellValue,h0,5] := "Ms."
var_Items:[CellValue,h0,6] := "12/8/1948"
var_Items:[CellValue,h0,7] := "5/1/1992"
var_Items:[CellValue,h0,8] := "507-20th Ave. \r\nE.Apt. 2A"
var_Items:[CellValue,h0,9] := "Seattle"
var_Items:[CellValue,h0,10] := "WA"
var_Items:[CellValue,h0,11] := "98122"
var_Items:[CellValue,h0,12] := "USA"
var_Items:[CellValue,h0,13] := "(206) 555-9857"
var_Items:[CellValue,h0,14] := "5467"
// Generate Source for 'OLE Automation(stdole2.tlb)' server from Tools\Automation Server... with the PREFIX std
var_Items:[CellValue,h0,15] := oDCOCX_Exontrol1:ExecuteTemplate("loadpicture(`c:\exontrol\images\sample.bmp`)")
var_Items:[CellValue,h0,16] := "Education includes a BA in psychology from Colorado State University in 1970. She also completed " + CHR(34) + "The Art of the Cold Call." + CHR(34) + " Nancy is a member of ToastmastersInternational."
var_Items:[CellValue,h0,17] := 2
oDCOCX_Exontrol1:PutItems(oDCOCX_Exontrol1:GetItems(0),nil)
oDCOCX_Exontrol1:PutItems(oDCOCX_Exontrol1:GetItems(0),nil)
oDCOCX_Exontrol1:PutItems(oDCOCX_Exontrol1:GetItems(0),nil)
|
|
539
|
How do I arrange, format or layout the column's data on multiple levels or lines
local var_Column,var_Column1,var_Column2,var_Column3 as IColumn
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:DefaultItemHeight := 68
IColumn{oDCOCX_Exontrol1:Columns:Add("EmployeeID")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("LastName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("FirstName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Handler")}:Visible := false
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Title")}
var_Column:Visible := false
var_Column:DisplayFilterButton := true
var_Column1 := IColumn{oDCOCX_Exontrol1:Columns:Add("TitleOfCourtesy")}
var_Column1:Visible := false
var_Column1:DisplayFilterButton := true
IColumn{oDCOCX_Exontrol1:Columns:Add("BirthDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HideDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Address")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("City")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Region")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("PostCode")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Country")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HomePage")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Extension")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Photo")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Notes")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("ReportsTo")}:Visible := false
var_Column2 := IColumn{oDCOCX_Exontrol1:Columns:Add("Personal Info")}
var_Column2:[Def,exCellFormatLevel] := "18;18/(15:54,(2/1/4))"
var_Column2:FormatLevel := "18;18/(15:54,(2/1/4))"
var_Column2:Width := 196
var_Column3 := IColumn{oDCOCX_Exontrol1:Columns:Add("General Info")}
var_Column3:[Def,exCellFormatLevel] := "18;19/((8/18;5):128,((((13/11/12),(6/7/10)),16)))"
var_Column3:FormatLevel := "18;19/((8/18;5):128,((((13/11/12),(6/7/10)),16)))"
var_Column3:Width := 512
oDCOCX_Exontrol1:Items:AddItem("")
oDCOCX_Exontrol1:Items:AddItem("")
oDCOCX_Exontrol1:Items:AddItem("")
oDCOCX_Exontrol1:Items:AddItem("")
|
|
538
|
How do I arrange, format or layout the column's header on multiple levels or lines
local var_Column,var_Column1,var_Column2,var_Column3 as IColumn
IColumn{oDCOCX_Exontrol1:Columns:Add("EmployeeID")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("LastName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("FirstName")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Handler")}:Visible := false
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("Title")}
var_Column:Visible := false
var_Column:DisplayFilterButton := true
var_Column1 := IColumn{oDCOCX_Exontrol1:Columns:Add("TitleOfCourtesy")}
var_Column1:Visible := false
var_Column1:DisplayFilterButton := true
IColumn{oDCOCX_Exontrol1:Columns:Add("BirthDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HideDate")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Address")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("City")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Region")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("PostCode")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Country")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("HomePage")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Extension")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Photo")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("Notes")}:Visible := false
IColumn{oDCOCX_Exontrol1:Columns:Add("ReportsTo")}:Visible := false
var_Column2 := IColumn{oDCOCX_Exontrol1:Columns:Add("Personal Info")}
var_Column2:FormatLevel := "18;18/(15:54,(2/1/4))"
var_Column2:Width := 196
var_Column3 := IColumn{oDCOCX_Exontrol1:Columns:Add("General Info")}
var_Column3:FormatLevel := "18;19/((8/18;5):128,((((13/11/12),(6/7/10)),16)))"
var_Column3:Width := 512
|
|
537
|
How can I select a cells like in excel
local var_Items as IItems
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := exRectSel
IColumn{oDCOCX_Exontrol1:Columns:Add("Column1")}:Selected := true
oDCOCX_Exontrol1:Columns:Add("Column2")
IColumn{oDCOCX_Exontrol1:Columns:Add("Column3")}:Selected := true
var_Items := oDCOCX_Exontrol1:Items
var_Items:DefaultItem := var_Items:AddItem(0)
var_Items:[CellValue,0,1] := 1
var_Items:[CellValue,0,2] := 2
var_Items:DefaultItem := var_Items:AddItem(3)
var_Items:[CellValue,0,1] := 4
var_Items:[CellValue,0,2] := 5
var_Items:DefaultItem := var_Items:AddItem(6)
var_Items:[CellValue,0,1] := 7
var_Items:[CellValue,0,2] := 8
|
|
536
|
How can I select a multiple column
local var_Items as IItems
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := exRectSel
IColumn{oDCOCX_Exontrol1:Columns:Add("Column1")}:Selected := true
oDCOCX_Exontrol1:Columns:Add("Column2")
IColumn{oDCOCX_Exontrol1:Columns:Add("Column3")}:Selected := true
var_Items := oDCOCX_Exontrol1:Items
var_Items:DefaultItem := var_Items:AddItem(0)
var_Items:[CellValue,0,1] := 1
var_Items:[CellValue,0,2] := 2
var_Items:DefaultItem := var_Items:AddItem(3)
var_Items:[CellValue,0,1] := 4
var_Items:[CellValue,0,2] := 5
var_Items:DefaultItem := var_Items:AddItem(6)
var_Items:[CellValue,0,1] := 7
var_Items:[CellValue,0,2] := 8
oDCOCX_Exontrol1:Items:SelectAll()
|
|
535
|
How can I select a column
local var_Items,var_Items1 as IItems
oDCOCX_Exontrol1:MarkSearchColumn := false
oDCOCX_Exontrol1:SingleSel := false
oDCOCX_Exontrol1:FullRowSelect := exRectSel
IColumn{oDCOCX_Exontrol1:Columns:Add("Column1")}:Selected := true
oDCOCX_Exontrol1:Columns:Add("Column2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("One"),1] := "One"
var_Items1 := oDCOCX_Exontrol1:Items
var_Items1:[CellValue,var_Items1:AddItem("Two"),1] := "Two"
oDCOCX_Exontrol1:Items:SelectAll()
|
|
534
|
How can I collapse all cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 64
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Expanded"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:CollapseAllCards()
|
|
533
|
How can I expand all cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 64
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Expanded"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:ExpandAllCards()
|
|
532
|
How can I expand or collapse a card
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 64
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Expanded"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
531
|
How can I format or arrange the data being displayed in the card
local var_Items as IItems
oDCOCX_Exontrol1:HasButtons := exNoButtons
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewTitleFormat] := "(" + CHR(34) + "Title:" + CHR(34) + ",0),1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := ""
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewWidth] := 164
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 18
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
530
|
How can I format or arrange the data being displayed in the card
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "(" + CHR(34) + "ABC" + CHR(34) + ",2)/(0,3," + CHR(34) + "DEFGH" + CHR(34) + ")/1/0/1/0/1/1,0[bg=RGB(230,230,230)][fg=RGB(255,0,0)"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewTitleFormat] := ""
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
529
|
How can I hide the tilte for the cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "0/1/0/1/0/1/0/1,0"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewTitleFormat] := ""
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
528
|
How can I display resizing lines between cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewVResizeLine] := true
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHResizeLine] := true
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBorderWidth] := 8
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBorderHeight] := 8
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
527
|
How can edit the text in the card
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 64
IColumn{oDCOCX_Exontrol1:Columns:Add("Column 1")}:Editor:EditType := EditType
IColumn{oDCOCX_Exontrol1:Columns:Add("Column 2")}:Editor:EditType := EditType
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
526
|
How can I change the height of the card
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 64
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
525
|
How can I display the cards from top to bottom
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewLeftToRight] := false
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
524
|
How do I change the background color for a specified card
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
var_Items:[ItemForeColor,var_Items:FocusItem] := RGB(255,0,0)
|
|
523
|
How do I change the visual aspect for a specified card
local var_Items as IItems
oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
var_Items:[ItemBackColor,var_Items:FocusItem] := 0x1000000
|
|
522
|
How do I change the background color for a specified card
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
var_Items:[ItemBackColor,var_Items:FocusItem] := RGB(255,0,0)
|
|
521
|
Is there any way to specify the foreground color for the title of the cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewTitleForeColor] := 255
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
520
|
Is there any way to specify the foreground color for all cards, including its title
local var_Items as IItems
oDCOCX_Exontrol1:ForeColor := RGB(255,0,0)
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
519
|
How can I change the visual appearance for all cards, including the title
local var_Items as IItems
oDCOCX_Exontrol1:VisualAppearance:Add(1,"c:\exontrol\images\normal.ebn")
oDCOCX_Exontrol1:VisualAppearance:Add(2,"c:\exontrol\images\pushed.ebn")
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBackColor] := 16777216
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewTitleBackColor] := 33554432
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
518
|
Is there any way to specify the background color for all cards, including its title
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBackColor] := 255
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewTitleBackColor] := 128
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
517
|
Is there any way to specify the background color for all cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBackColor] := 255
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
516
|
How can I specify the distance between cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBorderWidth] := 16
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBorderHeight] := 16
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
515
|
How can I resize the cards at runtime
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ItemsAllowSizing := exResizeItem
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewVResizeLine] := true
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHResizeLine] := true
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBorderWidth] := 8
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewBorderHeight] := 8
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
var_Items:[ExpandCard,var_Items:FocusItem] := true
|
|
514
|
How can show the grid lines for my cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
513
|
How can I hide the +/- expanding / collapsing buttons in the cards
local var_Items as IItems
oDCOCX_Exontrol1:ExpandOnDblClick := false
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
512
|
How can I hide the +/- expanding / collapsing buttons in the cards
local var_Items as IItems
oDCOCX_Exontrol1:HasButtons := exNoButtons
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
511
|
Is there any way to to specify the number of cards being displayed from letf to right
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewColumns] := 3
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
510
|
Is there any way to to specify the width of the cards, so they fit the control's client area
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewWidth] := 0
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewColumns] := 2
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
509
|
Is there any way to to specify the width of the cards, so they fit the control's client area
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewWidth] := 0
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
508
|
Is there any way to to specify the width of the cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewWidth] := 64
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
507
|
Is there any way to indent the control's data relative to the borders or the frame of the control
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:HeaderVisible := false
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exBorderWidth] := 8
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exBorderHeight] := 8
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
506
|
Is there any way to indent the control's data relative to the borders or the frame of the control
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:ViewMode := exTableView
oDCOCX_Exontrol1:[ViewModeOption,exTableView,exBorderWidth] := 8
oDCOCX_Exontrol1:[ViewModeOption,exTableView,exBorderHeight] := 8
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Item 1"),1] := "Item 1.1"
var_Items:[CellValue,var_Items:AddItem("Item 2"),1] := "Item 1.2"
var_Items:[CellValue,var_Items:AddItem("Item 3"),1] := "Item 1.3"
|
|
505
|
How can I display my rows or items as a table
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:ViewMode := exTableView
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Item 1"),1] := "Item 1.1"
var_Items:[CellValue,var_Items:AddItem("Item 2"),1] := "Item 1.2"
var_Items:[CellValue,var_Items:AddItem("Item 3"),1] := "Item 1.3"
|
|
504
|
How can I display my rows as cards
local var_Items as IItems
oDCOCX_Exontrol1:DrawGridLines := exAllLines
oDCOCX_Exontrol1:ViewMode := exCardView
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewFormat] := "1"
oDCOCX_Exontrol1:[ViewModeOption,exCardView,exCardViewHeight] := 36
oDCOCX_Exontrol1:Columns:Add("Column 1")
oDCOCX_Exontrol1:Columns:Add("Column 2")
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem("Card 1"),1] := "Card 1.1"
var_Items:[CellValue,var_Items:AddItem("Card 2"),1] := "Card 1.2"
var_Items:[CellValue,var_Items:AddItem("Card 3"),1] := "Card 1.3"
|
|
503
|
How can I avoid focusing a new cell, when user presses an arrow, page, home or end key, while the editor is opened
local var_Items,var_Items1 as IItems
oDCOCX_Exontrol1:[DefaultEditorOption,exLeftArrow] := 0
oDCOCX_Exontrol1:[DefaultEditorOption,exRightArrow] := 0
oDCOCX_Exontrol1:[DefaultEditorOption,exUpArrow] := 0
oDCOCX_Exontrol1:[DefaultEditorOption,exDownArrow] := 0
oDCOCX_Exontrol1:[DefaultEditorOption,exHomeKey] := 0
oDCOCX_Exontrol1:[DefaultEditorOption,exEndKey] := 0
oDCOCX_Exontrol1:[DefaultEditorOption,exPageUpKey] := 0
oDCOCX_Exontrol1:[DefaultEditorOption,exPageDownKey] := 0
IColumn{oDCOCX_Exontrol1:Columns:Add("Edit")}:Editor:EditType := EditType
IColumn{oDCOCX_Exontrol1:Columns:Add("Edit")}:Editor:EditType := EditType
var_Items := oDCOCX_Exontrol1:Items
var_Items:[CellValue,var_Items:AddItem(0),1] := 1
var_Items1 := oDCOCX_Exontrol1:Items
var_Items1:[CellValue,var_Items1:AddItem(2),1] := 3
|
|
502
|
How can I expand predefined items in a drop down list editor as I type
local var_Column as IColumn
local var_Editor as IEditor
local var_Items as IItems
oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
var_Column := IColumn{oDCOCX_Exontrol1:Columns:Add("DropDown")}
var_Column:[Def,exCellValueFormat] := 1
var_Editor := var_Column:Editor
var_Editor:[Option,exExpandOnSearch] := true
var_Editor:EditType := DropDownListType
var_Editor:DropDownAutoWidth := exDropDownEditorWidth
var_Editor:AddItem(1,"<b>CObject</b> class",1)
var_Editor:InsertItem(2,"<b>CCmdTarget</b> class",2,1)
var_Editor:InsertItem(3,"<b>CWnd</b> class",3,2)
var_Editor:InsertItem(6,"<bgcolor=10A0E0><fgcolor=F0F0F0>S y n c</fgcolor>",1,1)
var_Editor:AddItem(4,"Exceptions",1)
var_Editor:InsertItem(7,"<b>System</b> Exceptions",2,4)
var_Editor:AddItem(5,"File Services",2)
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(1)
var_Items:AddItem(2)
|
|
501
|
How can I add an extra button to a date picker editor
local var_Editor as IEditor
local var_Items as IItems
oDCOCX_Exontrol1:Images("gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTqlVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yNAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=")
oDCOCX_Exontrol1:DefaultItemHeight := 20
var_Editor := IColumn{oDCOCX_Exontrol1:Columns:Add("Date")}:Editor
var_Editor:EditType := DateType
var_Editor:AddButton("B1",2,1,"This is a bit of text that's shown when the cursor hovers the button B1",nil,nil)
var_Editor:ButtonWidth := 20
var_Items := oDCOCX_Exontrol1:Items
var_Items:AddItem(0)
var_Items:AddItem(1)
|